<html><head>
    <meta http-equiv="content-type" content="text/html; charset=UTF-8"><title>StatusBar.pb</title></head>
<body bgcolor="#FFFFDF" link="#009999" vlink="#006666" alink="#006666">
<pre><font face="Courier New, Courier, mono"size="2"><font color="#006666">;
</font><font color="#006666">; ------------------------------------------------------------
</font><font color="#006666">;
</font><font color="#006666">;   PureBasic - StatusBar example file
</font><font color="#006666">;
</font><font color="#006666">;    (c) Fantaisie Software
</font><font color="#006666">;
</font><font color="#006666">; ------------------------------------------------------------
</font><font color="#006666">;
</font>

<b><font color="#006666">If</font></b> <font color="#006666">OpenWindow</font>(0, 100, 150, 300, 100, "PureBasic - StatusBar Example", <font color="#924B72">#PB_Window_SystemMenu</font> | <font color="#924B72">#PB_Window_SizeGadget</font>)

  <b><font color="#006666">If</font></b> <font color="#006666">CreateStatusBar</font>(0,<font color="#006666"> WindowID</font>(0))
<font color="#006666">    AddStatusBarField</font>(100)
<font color="#006666">    AddStatusBarField</font>(50)
<font color="#006666">    AddStatusBarField</font>(100)
  <b><font color="#006666">EndIf</font></b>

<font color="#006666">  StatusBarText</font>(0, 0, "Area 1")
<font color="#006666">  StatusBarText</font>(0, 1, "Area 2", <font color="#924B72">#PB_StatusBar_BorderLess</font>)
<font color="#006666">  StatusBarText</font>(0, 2, "Area 3", <font color="#924B72">#PB_StatusBar_Right</font> | <font color="#924B72">#PB_StatusBar_Raised</font>) 
      
  <b><font color="#006666">Repeat</font></b>

  <b><font color="#006666">Until</font></b> <font color="#006666">WaitWindowEvent</font>() = <font color="#924B72">#PB_Event_CloseWindow</font>
  
<b><font color="#006666">EndIf</font></b> </font></pre>
</body></html>
